home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / Tools / Commo-Support / Disk-Archive / multitasking-demo.dms / multitasking-demo.adf / demo.script < prev    next >
Encoding:
Text File  |  1985-11-26  |  8.9 KB  |  247 lines

  1. topaz.font
  2. Rev 18-Sept-85
  3. 32 $000 $fff $000 $d00 $f00 $f80 $f90 $fb0
  4. $fd0 $ff0 $bf0 $8e0 $0f0 $2c0 $0b1 $0bb
  5. $0db $1fb $6fe $6ce $00f $61f $06d $91f
  6. $c1f $f1f $666 $db9 $c80 $336 $d00 $CC6
  7. %window 0 0 0 320 200 "Demo.Window" $1800 $0648
  8. %clear 0
  9. %start
  10. %font rhinestone.font 8
  11. ;
  12. ;     German version by Dr. Peter Kittel, CBM Ffm, 27.2.86
  13. ;
  14. ;     Begining of demo ... Hook screens
  15. ;
  16. %load Hello.ani clear 0 delay $10 animate 0 4
  17. %clrtxt 25 164 315 199 penb 0
  18. DrÜcken Sie die Leertaste, um eine VorfÜhrung der Multi-Tasking-Fähigkeiten
  19.  des Amiga Personal-Computers zu bekommen.
  20. %delay $7000 cycle 4 5 5 0 0
  21. ;
  22. ;                 "Holding" animation
  23. ;
  24. %clear 0 color 31 $CC6
  25. %load holding.ani
  26. %delay $0300 animate 0 26
  27. %clrtxt 30 164 300 199 pena 1 penb 0
  28. Gefällt es Ihnen, den ganzen Tag am Telefon festgenagelt zu sein?
  29. %pena 31
  30.    (Weiter mit der Leertaste)
  31. %delay $0D00 cycle 103
  32. 30 31 32 33 34 35 36 37 38
  33. 30 31 32 33 34 35 36 37 38
  34. 30 31 32 33 34 35 36 37 38
  35. 30 31 32 33 34 35 36 37 38
  36. 30 31 32 33 34 35 36 37 38
  37. 27 30 31 28 32 33 34 35 36 37 38
  38. 30 31 32 33 34 35 36 37 38
  39. 30 31 32 33 34 35 36 37 38
  40. 30 31 32 33 34 35 36 37 38
  41. 27 30 29 31 32 33 34 35 36 37 38
  42. 30 31 32 33 34 35 36 37 38
  43. ;
  44. ;                 "BagLady" animation
  45. ;
  46. %pena 0 rfill 310 199 10 164
  47. %cset2 load baglady.ani
  48. %delay $00 animate 0 9
  49. %clrtxt 40 164 280 199 pena 1 penb 0
  50. Erhöht das Warten in der Kassenschlange tatsächlich Ihre Produktivität?
  51. %load baglady.ani delay $2E00 color 2 $CC6 pena 2
  52.     (Weiter mit der Leertaste)
  53. %kids cycle 10 10 10 10 10 10 10 11 12 11 10
  54. ;
  55. ;           Amiga Guy animation
  56. ;
  57. %clrtxt 20 167 310 199
  58. %load amigaGuy.ani delay 0 animate 0 12
  59. %pena 0 rfill 10 170 0 150 rfill 319 170 310 150 pena 1
  60. Der Sinn des Personal-Computers ist einfach, Ihnen Zeit zu ersparen und
  61.  Ihre Produktivität zu erhöhen.
  62. %delay $7000 cycle 4 13 13 14 14
  63. %clrtxt 20 164 300 199
  64. %delay $0700 stamp 14 animate 17 24
  65. Aber oft scheinen Personal-Computer Sie eher eine Menge Zeit zu kosten.
  66.  DrÜcken Sie die Leertaste, dann werde ich es Ihnen erklären.
  67. %delay $7000 cycle 4 16 16 15 15
  68. ;
  69. ;           "Series" animation
  70. ;
  71. %clear 0
  72. %load series.ani
  73. %stamp 0 pena 0 rfill 315 142 180 108 efx2 clrtxt 20 164 300 199
  74. Die meisten Personal-Computer können nur eine Sache gleichzeitig tun.
  75.  Wenn sie 3 Dinge zu erledigen haben, mÜssen sie sie nacheinander tun.
  76. %wait clrtxt 20 164 300 199
  77. Und während der Computer eins nach dem anderen erledigt, mÜssen Sie warten und
  78.  zusehen.
  79. %delay $0C00 clock1 animate 1 7 pause 4 $8000 animate 8 21 pause 4 $8000
  80. %animate 22 35 pause 3 0 clrtxt 20 164 300 199
  81. Auf den Computer zu warten ist keine sehr produktive Art, seine Zeit zu
  82.  verbringen.
  83. %color 28 $CC6 pena 28
  84.    (Weiter mit der Leertaste)
  85. %wait clrtxt 20 164 300 199 load parallel.ani
  86. Der Amiga kann jedoch mehrere Dinge gleichzeitig erledigen. Das nennt man
  87.  Multi-Tasking.
  88. ;
  89. ;  Parallel task example
  90. ;
  91. %delay $0A00 animate 0 17 pena 0 rfill 315 142 180 108 efx2 wait
  92. %clrtxt 20 164 300 199
  93. Sie mÜssen nicht darauf warten, daß der Computer eine Arbeit fertigstellt,
  94.  bevor Sie ihm die nächste aufgeben.
  95. %clock2 delay $0A00
  96. %animate 18 26 pause 2 0 animate 41 48 pause 2 0 animate 35 40
  97. %pause 2 0 clrtxt 20 164 300 199
  98. Durch diese Multi-Tasking-Fähigkeit erhöht der Amiga tatsächlich Ihre
  99.  Produktivität. Sehen wir uns ein Beispiel an...
  100. %wait
  101. ;
  102. ;     This is Fred...
  103. ;
  104. %clear 0 load Fred.ani delay $0200 animate 0 8
  105. %clrtxt 5 158 315 199
  106. Dies ist Fred. Er hat ein kleines Geschäft und einen Personal-Computer und
  107.  möchte einen Prospekt Über neue Spezialitäten an einige seiner Kunden
  108.  verschicken. Wir wollen ihm dabei helfen.
  109. %delay $1D00 cycle 4 9 10 9 11
  110. %pena 0 rfill 315 199 2 158 clrtxt 20 164 300 199
  111. Zuerst mÜssen wir seine Kundenliste sortieren, dann den Prospekt entwerfen
  112.  und schließlich alle Briefe drucken.
  113. %cycle 4 9 10 9 11 clrtxt 20 164 300 199
  114. Zuerst lassen wir den Computer die Namen sortieren. DrÜcken Sie die
  115.  "F1"-Taste als Startsignal.
  116. %font topaz.font 8
  117. %wait clear 0 load myColors.ani pena 10 rfill 319 10 0 0
  118. %pena 0 penb 10 @ 20 8
  119. Fred's Computer
  120. %penb 0 pena 10 @ 2 30
  121. Sorting Customers by Address.
  122. %font rhinestone.font 8
  123. %pena 9 move 0 160 draw 319 160 move 0 162 draw 319 162
  124. %clrtxt 20 164 300 199 pena 1
  125. Jetzt sortiert der Computer, und wir mÜssen bis zum Ende warten, bevor
  126.  wir etwas anderes tun können.
  127. %font topaz.font 8
  128. %efx6 2 30 3000
  129. %clrtxt 20 164 300 199 pena 1 font rhinestone.font 8
  130. Jetzt ist das Sortieren fertig. Beachten Sie, daß wir solange herumsitzen
  131.  und zugucken mußten, bis der Computer fertig wurde.
  132. %color 8 $CC6 pena 8
  133.    (Leertaste)
  134. %wait
  135. %clrtxt 20 164 300 199
  136. Nun können wir den Prospekt-Text eintippen. DrÜcken Sie die "F2"-Taste.
  137. %wait clrtxt 1 12 319 130 cset2 load cset.printer color 28 $4D0 pena 28
  138. ;
  139. ;  User finishes memo by typing name
  140. ;
  141. und da ich Sie als Geschäftspartner schätze, freut es mich besonders,
  142.  Ihnen dieses spezielle Angebot zu unterbreiten. Beachten Sie unser großes
  143.  Angebot an Hochzeits- und Geburtstagstorten, sowie unsere preiswerten
  144.  Qualitätsbackwaren fÜr den Alltag. Mit freundlichen GrÜßen...
  145. %clrtxt 20 164 310 199 pena 1
  146. Um den Brief zu beenden, tippen Sie ein "Fred the Baker" und drÜcken die
  147.  RETURN-Taste.
  148. %input 28 150 95 8 30 clrtxt 10 164 310 199
  149. Jetzt lassen wir diesen Brief von unserem Computer fÜr jeden Kunden aus der
  150.  Liste drucken:  DrÜcken Sie die "F3"-Taste.
  151. %wait clrtxt 10 164 310 199 load yoyo.ani clear 0
  152. ;
  153. ;  Printer animation with Fred & Yoyo
  154. ;
  155. %delay $10 animate 21 28 stamp 0 clrtxt 2 155 315 199
  156. Es wird 2 Stunden dauern, alle Briefe zu drucken. Fred wÜrde gern mit dem
  157.  Rest seiner Arbeit anfangen, doch er muß bis nach dem Abendessen warten,
  158.  bis der Computer fertig ist. (Keine sehr produktive Zeitausnutzung.)
  159. %delay $0A00 cycle 40
  160. 29  1 32  2 33  3 34  4 35  5 30  6 34  7 33  8 32  9 31 10
  161. 29 11 32 12 33 13 34 14 35 15 30 16 34 17 33 18 32 19 31 20
  162. %clrtxt 2 155 315 199
  163. ;
  164. ;        Rose's Flower Shop
  165. ;
  166. %cset2 load Rose3.ani
  167. %delay $0000 animate 0 6 clrtxt 20 164 310 199
  168. Dies ist Rose. Sie hat auch ein kleines Geschäft und möchte einen Prospekt
  169.  verschicken. Sie benutzt einen Amiga Personal-Computer. Wir wollen auch ihr
  170.  helfen.
  171. %delay $2600 cycle 4 7 9 8 9 clrtxt 20 164 310 199
  172. Um ihre Kundenliste zu sortieren, drÜcken Sie die "F1"-Taste.
  173. %cycle 4 7 9 8 9
  174. ;
  175. ;  Starting sorting Rose's customers
  176. ;
  177. %color 0 $038 clear 0 pena 1 move 0 0 draw 319 0 draw 319 199 draw 0 199
  178. %draw 0 0 rfill 319 10 0 0 pena 0 penb 1 @ 2 8
  179. Amiga Personal-Computer
  180. ;  draw sort window
  181. %pena 0 rfill 220 80 5 15  color 8 $fd0 color 6 $f90
  182. %pena 8 penb 0 move 5 15 draw 220 15 draw 220 80 draw 5 80 draw 5 15
  183. %rfill 220 24 5 15 pena 0 penb 8 @ 10 23
  184. Datenbank
  185. ;  clear text at bottom and draw bar
  186. %penb 0 pena 0 rfill 319 199 0 160 color 28 $4D0 pena 1
  187. %move 0 160 draw 319 160
  188. %clrtxt 5 164 315 199 pena 28
  189. Aber jetzt...anstelle auf den Amiga zu warten, können wir sofort mit der
  190.  Arbeit am Brief beginnen. DrÜcken Sie die "F2"-Taste, um ihr
  191.  Textprogramm zu starten.
  192. %efx5 15 40 3000 $5000 0 wait clrtxt 5 164 315 199
  193. ;
  194. ;  Open Memo to edit while still sorting
  195. ;
  196. %pena 0 rfill 300 155 20 60
  197. %pena 6 move 20 60 draw 300 60 draw 300 155 draw 20 155 draw 20 60
  198. %rfill 300 69 20 60 pena 0 penb 6 @ 25 68
  199. Textverarbeitung
  200. %clrtxt 24 71 299 150 cset2 load cset.printer pena 1 penb 0
  201. und da ich Sie als Geschäftspartner schätze, freue ich mich besonders,
  202.  Ihnen dieses spezielle Angebot zu unterbreiten. überzeugen Sie sich von
  203.  dem breiten Angebot an Schnitt- und Topfblumen und unser preiswertes
  204.  Topf- und Pflanzmaterial. Mit freundlichen GrÜßen...
  205. %clrtxt 20 164 300 199 pena 28
  206. Beachten Sie, daß der Amiga WEITER sortiert... während wir mit der
  207.  nächsten Aufgabe weitermachen.
  208. %wait
  209. ;
  210. ;         Have user finish memo
  211. ;
  212. %clrtxt 20 164 300 199 pena 28
  213. Tippen Sie "Rose Thornbush" und drÜcken die RETURN-Taste. Durch die
  214.  Multi-Tasking-Fähigkeit spart der Amiga Ihnen Zeit.
  215. %input 1 160 140 8 20
  216. %clrtxt 20 164 300 199 pena 28
  217. Der Amiga kann mit seiner Arbeit weitermachen, während wir zur nächsten
  218.  Aufgabe Übergehen.
  219. %wait efx5 0 clrtxt 20 164 300 199 pena 28
  220. Nun mÜssen wir noch die Briefe drucken. DrÜcken Sie die "F3"-Taste.
  221. %wait clrtxt 20 164 300 199 cset2 load Rose3.ani
  222. ;
  223. ;  Rose typing while printer spits paper
  224. ;
  225. %color 0 $000 clear 0 delay $10 animate 0 6 stamp 10 clrtxt 15 164 315 199
  226. Das Drucken wird immer noch 2 Stunden dauern, aber mit dem Amiga können
  227.  Sie sofort etwas anderes beginnen, während er im Hintergrund alles zu Ende
  228.  fÜhrt.
  229. %delay $0A00 cycle 33
  230. 10 11 7 12 13 9 14 15 8 16 17 9 19 20 8 21
  231. 22 7 23 24 9 25 26 8 27 28 9 29 30 7 31 10 8
  232. %clrtxt 15 164 315 199 load End.ani delay $10 animate 21 29 stamp 34 stamp 0
  233. Also noch einmal ... was möchten Sie lieber:
  234.    a) einen Computer, der Sie warten läßt, oder
  235.    b) einen Amiga, auf den Sie nicht warten mÜssen.
  236. %delay $0A00 cycle 30
  237.  1 31  2  3 32  4  5 33  6  7 32  8  9  31 10
  238. 11 32 12 13 33 14 15 32 16 17 33 18 19  32 20
  239. %clear 0 load hello.ani delay $10 animate 0 4
  240. %clrtxt 20 164 310 199
  241. Lassen Sie sich von einem Verkäufer mehr Über den Amiga Personal-Computer
  242.  erzählen.
  243. %delay $7000 cycle 4 5 5 0 0
  244. %clear 0 restart end 
  245.  
  246.  
  247.